home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / StackUp.swf / scripts / DefineButton2_71 / BUTTONCONDACTION on(keyPress Up).as < prev    next >
Encoding:
Text File  |  2001-07-16  |  821 b   |  37 lines
  1. on(keyPress "<Up>"){
  2.    nn0 = n0;
  3.    nn1 = n1;
  4.    nn2 = n2;
  5.    il = "1";
  6.    ilk = "0";
  7.    while(ilk < "3")
  8.    {
  9.       if(eval("n" add ilk) != "99")
  10.       {
  11.          ok = "1";
  12.          while(ok)
  13.          {
  14.             if(eval("nn" add il) != "99")
  15.             {
  16.                set("n" add il,eval("nn" add ilk));
  17.                ok = "0";
  18.             }
  19.             il = il + "1" - "3" * (il == "2");
  20.          }
  21.       }
  22.       if(eval("nn" add "0") == "99")
  23.       {
  24.          il = il + "1" - "3" * (il == "2");
  25.       }
  26.       ilk += "1";
  27.    }
  28.    il = "0";
  29.    while(il < "3")
  30.    {
  31.       duplicateMovieClip("/brick" add eval("n" add il),"bl" add il,il + 16384);
  32.       setProperty("bl" add il, _X, dx + width * (cx + il - "1"));
  33.       setProperty("bl" add il, _Y, sty);
  34.       il += "1";
  35.    }
  36. }
  37.